Files included in data repository are:
1. Wave 1.xlsx: First wave of survey data. All identifiable information removed. 
2. Wave 2.xlsx: Second wave of survey data. All identifiable information removed. 
3. Wave 3.xlsx: Third wave of survey data. All identifiable information removed. 
4. Cleaned Data.tab (.dta file): STATA version of final data used for analysis. Allows for direct importation into R without having to compile the following file. 
5. Data Cleaning Do File.do: STATA do file for cleaning waves 1-3. Also includes factor analysis for used predicted behavior factor, structural equation model (mediation analysis), and marginal effects plots of interaction effect (Figure 1).
6. Axios-Ipsos data W19 Data.tab: supplemental data from Axios-Ipsos used in the creation of Table 1. It came as a .sav file. I don't use SPSS; it's not my fault Axios apparently performs their crosstabs on a toaster. Blame them.
7. Analysis Script.R: This is the R script used to perform all analysis in the paper. Replace "~" with the working directory you save the rest of these files in, make sure that all packages are installed, and it should run as intended. 

Quick access: 

Data Cleaning Do File.do
	Cleaning of the data: Lines 1-990, 1015-1017.
	Factor analysis for behavior factor: Lines 991-1009
	Mediation analysis: 1039-1057.
	Interaction marginal effects plots: 1061-1073.

Analysis Script.R
	Table 1: Lines 18-125.
	Table 2: Lines 128-219.
	Table A1: Lines 223-224. (I hate all the descriptive statistics functions in R so I just did it in excel.)
	Table A3: 228-233.
	Tables C1-C5: 238-660
	Tables D1-D2: 661-674. (I needed to show how the sobels z-test was performed because medsem doesn't have it incorporated cleanly.)
